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DECUS Program Library Write-up 


DECUS No. 8-377 


0 N '3 - PASS A S 3 j H B L 3 R 

ABSTRACT: This program is for on-line use with the PDP-8 
oeries computers with At or greater core. The 
assembly is made directly into the memory of the 
computer, and a paper tape in rim or bin format may 
be punched. The op code field length is limited to 
tiix*ee characters 'with indirect addressing and linking 
available. 

DESCRIPTION : There are Ij. major fields in a line. 

{&) THE LOCATION FIELD must start with a letter and 
can be 3 or more characters long, but only the 
last three characters are used. 

(b) THE OPERATION FIELD follows and uses only 3 alpha 
characters. Operate instructions may be combined 
using a comma. Absolute instructions may be 
entered directly. 

(c) THE ADDRESS OR NUMERIC FIELD *s next and may be 
absolute or symbolic. If symbolic, the same 
restrictions are imposed as in the location field. 
The address may be modified by an octal constant 
when using symbolic addressing. 

(d) COMMENT FIELD is the last in line. Here comments 
may be entered by the operator for explanation of 
procedure. 












SYMBOLS : For the purpose of this assembler, a symbol is 


defined as a string of 3 °r fewer characters where the 
leading character must be alpha. If more than 3 char¬ 
acters are entered, only the last three will be 
considered. A character is a letter or number. In 
this assembler, all numeric data is assumed to be octal 
except the pseudo-operation DEG, which converts decimal 
numbers to octal. Numbers may be signed. All numbers 
are right adjusted and four digits long. ie.. 0007 is 
equal to 7 and 12345° is equal to 3456. Special symbol 
are not allowed except as noted. 
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LOCATION: The location field may contain a symbol if desired; 

but if none is needed, a space terminates the field. A 
symbol entered in the location field is assigned the 
currant value of the location counter. 'The symbol can 
be then referenced from other places in the program. A 
symbol which appears more than once in the location field 
is considered a multiply-defined symbol. An error -will 
be detected, and the message, "PREVIOUSLY DEFINED", will 
be typed and the same line reentered. 

OPERATION COPT : The operation code can be the absolute 

instruction, a legal symbolic 3-letter op code, or a 


previously defined 3-letter op code. The operation co.de 
field is terminated with a space. If a spaco was the only 
character typed, it is interpreted as an absolute instr¬ 
uction of value zero. The special symbol is to be 

used for indirect addressing. 
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ADDRESS: 


The address field is skipped if the op code was an 


operate instruction, a previously defined op code, a 
space, or an absolute instruction. However, if the op 
code is a memory reference instruction , the address field 
may contain: 

(a) an absolute address, 

(b) a 3-letter symbolic address (which will have to be 
defined at some time in the location field), or 


(c) the symbol ".+n". 

The page address is then formed. In numeric address , a 
space is interpreted as zero. A symbol has the value c£ 
the location counter which was defined in the location 
field. Numbers must be in octal except where the op code 
is the pseudo-operation DBG, which requires a decimal 
value. An address field ",+n" is interpreted as follows: 
is the symbol which has the present value of the 
location counter; 

"+n” is then algebraically added to the location counter 
to form the address. 

If appears, the next character must be a "+". A 

symbolic address may also have "+n" added algebraically 
to it. An illegal address which is located on the wrong 
page will be flagged and the assembler will type "WRONG 
PAGE" and will reenter the line. 


OPERATION CODES: The operation codes are described in the 

PDP-d manual or the small computer handbook. Appendix B 
gives a list of the op codes recognized by this assembler. 


3 












PSEUDO OPERATIONS: 


1. OCT: The address field is interpreted as a signed 
octal number. If the 2's complement is 

formed. 


2. DEC: The address field is interpreted as a signed 
decimal number. If the 2’s complement 

of the octal number is formed. The decimal 
number in absolute value mmst be less than 4.095 
decimal. (Care must be exercised in signed 
numbers, since the largest positive 2's comple¬ 
ment number is + 204 . 7 ^ and the largest negative, 

~2P4.8 10 .) 

ALP: Used to introduce alphabetic information into 

the program. The first 2 characters read into 

'. 

the address field will be converted to a trim 
code and stored as one packed ’word. Any char¬ 
acter on the TTY may bo used. The code used to 
form the two parts of the word is obtained by 
subtracting 2){.0 q from the teletype code. 
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4 .. DEP: Used to define a new op code. The symbolic name 
is entered in the location field and the absolute 
value is entered in the address field. This op 
code may not be used to change a previously 
defined op code nor to define a memory reference 
instruction, as when the defined op code is used, 
the address field is skipped. 
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5. BSZ: 


Defines a block storage having a length specified 
by the value of the octal number in the address 
field. The contents of the elements of the block 
are set to zero. 

6. SQU: Used in linking from one page to another. 'The 

contents of the location specified by the present 
value of the location counter vri.ll take on the 
value of the symbol in the address field. Any 
legal address may be used. 

7. 3ND: Determines if all symbolic address have been 

defined. Two searches are made, one of the 
Undefined Address Table, and one of the Line 
Table. If an undefined address is found, the 
name, location, and "UNDEFINED" is typed. When 
all addresses have been defined, "DONE" is then 
typed. 

' 3 . ORG: The address field is interpreted as the value to 
which the location counter is to be set. Only a 
numeric address can be used. 


9. RIM: This pseudo op code punches out information 

contained in selected blocks of core memory as 
RIM-coded tape via the ASR 33 perforated tape 
reader. Up to 9 DEO different blocks of core 
may be punched on one tape. After the lino has 
been terminated, the TTY will type "SA": 
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of the block to 




(a) Type the Starting Address 
be punched. A space terminates the line. 

rr n« TTY will then type "FA": 

(b) Type the Pinal Address of the block to be 
punched; a space again t rrainates the line. 

The TTY will again type "SA". To terminate the 
"read in" node and punch the tape the FA must be 
savqj either a space or a sore then a spac*. will 
t-ruinate the "read in" mode. The TTY will then 
do a Cil/LF. Turn on the punch and hit the space 
bar; the tape then will be punched. A check sum 
is punched before the trailer. 


Bill t Punches paper tape in BIT! format. The pr re dare 
is the same as for Rill. 
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The PDP-8 floating point instructions have been incor 
porated in the assembler. (See Appendix D.~ _ Flo„» ng 
point System Summary. ) ''They are: 

FLT: This inserts JM5* 07, an Indirect .pimp into the 


floating point package. 
preted by the package ur¬ 


ine true tions are inter¬ 
im 1 an exit is enc'-nncer 


MT: 


TXT: 


Same as FLT, (used with L.lL modified floating 
point package). 

Inserts a 0000. This is the exit from floating 


point. 


cd 


6 





ADD: 

Inserts 

1 vyv 

It causes a floating add to the 



floating accumulator from location xxx. 


SUB: 

Inserts 

Fxxx. 

Subtracts xxx from floating AC. 


MUY: 

Inserts 

3 xxx. 

Multiply from xxx. 


DIV: 

Inserts 

Ipcxx. 

Divide from xxx. 


G-ET: 

Inserts 

5 xxx. 

• 

Loads floating AC from xxx 



wi thov.t 

clearing xxx. 


PUT: 

Inserts 

6 xxx. 

Stores floating AC in xxx 



without 

c 10 3.1* i 

ng FAC. 

COT 

•IMENT FIELD 

: After 1 

bernination from the address field, the 


teletype ; 

si*)aces to 

the comment field and prints a slash. 


"/". Any 

teletype 

charac 

ter except special characters may 


be printed here. A carriage return terminates the line 
and the Location Counter is incremented by one. 


SPECIAL CHARACTERS : Special characters may b o use 
those used in the assembler are: 

Used to terminate the lino, if this 
is used before the line is ended (iq 


C .iRRIAGE 
RETURN: 


d any time; 


character 
..not in the 


comment field), an error "NOT FINISHED" will be 
typed and the v.'holo lino will be reentered. 


RUB Will cause the ’whole lino to be reentered. • Phis 

OUT: 

symbol nay be used any time before the carriage 
return is used and will erase the 'whole line. 

/ A carriage return and line feed will be executed 

and teletype will tab over to the comment field. 
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Causes the teletype to type the current value of 
the assembled op code, et al, associated with 
the current value of the location counter. 




t 


ALTMODE 


Erases the defined list, but the value of the 
location counter will remain unchanged. 

Restarts the program with the location counter 
reset to 200, clearing all lists. 



Causes the computer to jump indirectly to the 
location specified by location Il 026 . tan escape 
route to system loaders, etc.) 


ERROR INDICATIONS : Various assembly conditions are illegal; 
the appropriate error flags are defined below: 

UNDEFINED: .Vi 11 be typed when an op code not in the legal 

op code list or not a newly defined op code is 
encountered in the operation field. No check is 
made on octal op codes. 


ILLEGAL Will be typed if: 

CHAR 

(a) A number is typed first in the location field. 

(b) A combination of alpha and octal is typed in 
the operation field. 

(c) A number is typed first, then an aloha char¬ 
acter in the address field. 

(d) A letter is typed after a . 

(e) An 8 or 9 is typed at any time except on the 
DEC op code. 
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PREVIOUS 

DRV. 


TOO 

MANY 


DEFINE 

SOFT: 


WRONG 
PAGE! 


This will be typed if a sprit)ol has been used in 
the location field once, and is reused. The 
can clear the old list allowing the new name to 


be used, but all ocher entries in the old list 
are then lost. 

This is typed while in the location field if no 
none rooa is available in the list for a new 


tag. The only way to none 


new tag is to erase 


the defined 
just the. de 
all lists. ) 
the pseudo 


defined op 


is greater 


list. (Either a 
fined list, or an 
If "TOO MANY" is 
op code, DEF, (the 
codes) is full; if 
than '|-095 i 0* ^he ~ 


ip" which erases 
" which erases 
typed while in 
list for new 
in DEC, the number 
jrgest nu.mber the 


computer can handle. 

Indicates either the Link Table or the Undefined 
Table is full, depending upon which one is in 
use at the time the message was typed. 

A reference lias been made which is not on tie 
same page or page zero. It could occur in the 


location field, showing that earlier a reference 
to the symbol had been made in an address field 
on another page. It can also occur in the 
address field, whenever the calculated address 
is off the current page and not in page zero. 
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UOT Tlais means the carriage return had boon s uructc 

PTT'USHED l 

before the teletype was in the comment- field. 


On 


an r error, the whole line is erased and reentered. 


\CIC?0’.-IijlD5’i!3NTS: The author wishes to thank Mr. Don M. Evans 
for the original concept and for his help and criticism, 
and also Mr. James Guggemos and Mi*. Robert Belshe for 
their valuable assistance* 
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APFENDI X A 


0200 

TYP 

DEF 

4430 

/DEFINE A SUBROUTINE NAMED TYP,/ 





/JMS INDIRECTLY THRU LOCATION 30 . 

0200 

PNT 

DEF 

4431 

/DEFINE A SUBROUTINE NAMED PNT, / 





/JMS INDIRECTLY THRU LOCATION 31. 

0200 

ST APT 

CRA 


/START OF MAIN PROGRAM, NOTE ONLY T'-?f / 





/LAST 3 LETTERS OF THE TAG START apt / 





/USED. 

020 1 


TYP 

» 

/THIS CALLS THE SUBROUTINE TYP, = 44?0 





/THE EC UAL SIGN GIVES THE OCTAL / 





/INSTRUCTION. 

0202 


ECU 

MSG 

/THIS WILL BE THE ADDRESS OF MSG. 

0203 


HLT 


/PROGRAM IS OVER . 

£ 0204 


ORA 

500 

/START AT LOCATION 500. 

0500 

TYP 

BSZ 

1 

/THE SUBROUTINE TYF IS NOW DEFINFD. 

0501 


TAD* 

TYP 

/TAD INDIRECTLY THRU LOCATION TYP / 





/TO GET THE ADDRESS OF THE MESSAGE. 

0502 


DC A 

ADR 

/PUT AT LOCATION ADR. 

0503 


ISZ 

TYP 

/SFT UP RETURN. 

0504 

LOOP 

TAD* 

ADR 

/GFT .FIRST WORD OF MESSAGE. 

0505 


SNA 


/SKIP IF AC DOES NOT ECUAL 7FRO / 





/IF ZERO RETURN. 

0506 


JMF* 

TYP 

/RETURN. 

0 507 


DCA 

TMP 

/PUT WORD IN TEMP LOCATION. 

0510 


TAD 

TMP 

/GET WORD. 

0b 1 1 


AND 

M 7 7 00 

/MASK OFF LOWER FART OF FORD, SECOND / 





/LETTER. 

0512 


JMS 

R7L 

/JMP TO SUBROUTINE ROTATE 7 LEFT. 

0513 


TAD 

HP 4G 

/ASSEMBLE WORD FOR PRINTING. 

0514 


PNT 


/PRINT IT . 

0515 


TAD 

TMP 

/GET WORD AGAIN. 

A 0516 


AMD 

M 77 

/MASK OFF FIRST LETTER. 

0517 


TAD 

KP4G 

/ASSEMBLE FOR PRINTING. 

0520 


FNT 


/PRINT IT. 

0521 


ISZ 

ADR 

/SET UP LOCATION OF NEXT WORD. 

0522 


JMP 

LOOP 

/GET NEXT WORD. 

0523 

ADR 

0 


/SETS THIS LOCATION TO ZERO FOR A / 





/TEMP LOCATION FOR ADDRESS. 

0524 

TMP 

BSZ 

1 

/ALSO SETS THIS LOCATION TO ZERO. 

052 5 

M 7 7 0 0 

OCT 

7700 

/THIS SETS THIS LOCATION TO 1700 * 

0526 

M77 

77 


/THIS SETS THIS LOCATION TO 77. 

0527 

K240 

240 


/CONSTANT 240. 

0530 


ORG 

400 

/START AT LOCATION 400. 

0400 

R7L 

BSZ 

1 

/SUBROUTINE TO ROTATE AC AND L / 





/7 TIMES LEFT. 

0401 


CLL# RAL 


/COMBINES CLL AND RAL USING COMMA. 

0402 


RTL 


/ROTATE ? LEFT. 

0403 


RTL 


/ 

0404 


RTL 


/ 

0405 


JMP* 

R7L 

/JMP INDIRECTLY THRU R 7L• 
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0406 

0407 

0410 

PNT 

0 

TLS 

TSF 


/ZERO THIS LOCATION FOR RETURN. 

/SEND CHARACTER*CLEAR FLAG. 

/SKIP WHEN DONE. 

041 1 

0412 


JMP 

CRA 

.-1 

/JMP BACK 1 LOCATION. 

/CLEAR AC AND L. 

0413 


JMP* 

PNT 

/RETURN. 

0414 


ORG 

300 

/START AT LOCATION 300. 

0300 

MSG 

ALF 

ON 

/MESSAGE TO PE PRINTED IN LPL COD r . 

0301 


ALF 

E 

/ 

0302 


ALF 

PA 

/ 

O303 


ALF 

SS 

/ 

0304 


ALF 

A 

/ 

0305 


ALF 

C C; 

/ 

0306 


ALF 

EM 

/ 

03.07 


ALF 

BL 

/ 

0310 


ALF 

EH 

/ 

£31 1 

0312 


ALF 

• 

/ 

/ZERO THIS LOCATION WITH A SPACE / 

/SO PROGRAM WILL KNOW WH-N MESSAGE / 
/IS ENDED. 

0313 


ORG 

30 

/START AT 30. 

0030 


EG;U 

TYP 

/PUTS LOCATION OF TYP HFFE. 

0031 

00 32 

DONE 

0032 


ECU 

END 

BIN 

PNT 

/PUTS LOCATION OF PNT HER r . 

/USING END WE CHECK FOR ANY UNDFFT NFD/ 


/TAGS*BIN WILL GIVE A FAPFP TAPF / 
/IN BIN FORMAT FOR THE LOCATIONS / 


/BETWEEN SAs AMD FA: . 



SA 

200 

FA 

203 

SA 

500 

FA 

527 

SA 

400 

FA 

413 

SA 

300 

FA 

312 

SA 

30 

FA 

31 

SA 


FA 



8i$<£<(/”SS+?? D9888.0&0I* 
0032 

0033 


. C/. FO ! 33 ! 335?-"* ??<? + 
/PROGRAM IS NOW 


ALL ASSEMBLED / 


/AND A PAPER TAPF PUNCHED. 
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0200 


DEF 

4500 

/THIS WOULD DEFINE A SPACE AS JMS* 100 / 
/BECAUSE A SPACE WAS THE ONLY CHARACTER/ 
/IN THE LOCATION FIELD. / 

/THIS IS NOT WANTED SO THE RUBOUT KEY / 
/IS HIT AND THE LINE RE-ENTERED. - 

0200 

TYP 

DEF 

4430 

/NOW LINE IS CORRECT. 

0200 

PNT 

OEF 

4431 

/ALL NEW OPCODES MUST BE DEFINED / 
/BEFORE THEY ARE USED OR THEY CAN NOT / 
/BE DEFINED. 

0200 

START 

CRA 


/START CAN NOT BE USED AS AN OPCODE. 

0201 

0201 

START 

PREVIOUS 

DEF. 

/THE ONLY WAY START CAN BE DEFINED IS / 
/TO CLEAR THE DEFINED LIST USING $ 

0201 

START 

DEF 

4432 

/ 

0201 


START 


/TO CHECK WHAT AN OPCODE IS HIT =4432 

0202 

IX ILLEGAL CHAR 



0202 

XI 

BSZ 

2 

/IX WAS AN ILLEGAL CHARACTER BECAUSE / 
/IT STARTED WITH A NUMBER* MUST START / 





/WITH A LETTER. 

0204 


OCT 

-1 

/=7777 HERE ARE EXAMPLES OF THE USE 

0205 


DEC 

10 

/=0012 OF OCT AND DEC. 

0206 


DEC 

-10 

/=7766 

0207 


OCT 

1 

/=0001 IF DEC IS TOO LARGE: 

0210 


DEC 

4096 TOO MANY! 

0210 


DEC 

-4096 TOO MANY! 

0210 


DEC 

A ILLEGAL CHAR 

0210 


OCT 

A ILLEGAL CHAR 

0210 


OCT 

8 ILLEGAL CHAR 

0210 


OCT 

1234567 

/=4567 ONLY THE LAST 4 NUMBERS ARE USED/ 
/ONLY NUMBERS CAN BE USED IN THE ADORES/ 
/FIELD WHEN USING DEC* OCT OR BSZ. 

021 1 

A 

BSZ 

A ILLEGAL CHAR 

021 1 

A 

BSZ 

1 

/ 

0212 


JMP* 

A 

/=5611 USING A AS AN ADDRESS. 

0213 


JMP 

A 

/=5211 

0214 


JMP 

A - 1 0 

/=5201 USING A AS AN ADDRESS THEN / 
/MODIFING THE ADDRESS. 

0215 


JMP 

. + 10 

/=S225 USING . + OR .- 

0216 


ORG 

600 

/TO START AT A DIFFERENT ADDRESS. 

0600 

S 

EOU 

A 

/=0211 THIS CAN BE USED FOR LINKING. 

0601 

0602 


TAD* 

S 

/=1600 HERE WE CAN GET THE CONTENTS / 

/OF A USING LINKING. 

/A DOLLAR SIGN CAN BE USED TO CLEAR / 
/THE DEFINED LIST BUT KEEP THE OPCODES / 
/THAT WERE DEFINED. $ 


0602 

S 

TYP 


/=4430 TO CLEAR ALL LISTS USE ♦ 

0200 

S 

TYP UNDEFINED 


0200 

A 

DCA 



NOT 

0200 

FIN IS HED! 



/HERE THE RETURN WAS HIT BEFORE THE / 


/COMMENTS FIELD WAS REACHED. 
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0201 


/IF A LETTER IS HIT INSTEAD OF A NUMBER/ 
/THE TTY WILL TYPE SAl AND START / 

/THE BLOCK AGAIN. 


BIN 


SA: 1 j 

FA: 2 / 

SA: 2 
FA: A 
SA: A 
SA: *• 

0201 RIM 


/IF THE RU80UT KEY IS HIT THE LINE / 

/IS RE-ENTEREO. / 

/IF MORE THAN 10 DEC BLOCKS ARE TYPED / 
/AN ERROR IS FLAGGED AND THE LINE / 
/RE-ENTERED. 


SA: 

0 


FA: 

l 


SA: 

0 


FA: 

2 


SA: 

0 


FA: 

3 


SA: 

0 


FA: 

4 


SA: 

0 


FA: 

5 


SA: 

0 


FA: 

6 


SA: 

0 


FA: 

7 


SA: 

0 


FA: 

10 


SA: 

0 


FA: 

1 1 


SA: 

0 


FA: 

12 

TOO MANY! 

0201 



0202 

TAD 

0203 

OCA 

0204 

E9U 

020S 

EOU 

0206 

END 

A 0202 

UNDEFINED 

B 0203 

UNDEFINED 


/THE FOLLOWING IS AN EXAMPLE OF END. 
/ 

/ 

/ 

/ 


A 0204 UNDEFINED 
U 020S UNDEFINED 


0206 A 

0207 B 

0210 U 

0211 


BSZ 1 

BSZ 1 

BSZ 1 

END 


/FIRST THE UNDEFINED LIST IS TYPED# 
/THEN THE LINK LIST IS TYPED. 

/WHEN ALL LISTS ARE DEFINED# DONE / 
/IS TYPED AND THE LINE IS RE-ENTERED. 


DONE 


021 1 
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APPENDIX 


B 


Processor Instructions 


0000 

AND 

Logican AND 

1000 

TAD 

Tiro's complement ADD 

2000 

ISZ 

Increment and skip if Zero 

3000 

DCA 

Deposit and clear AC 

4000 

JMS 

Jump to subroutine 

5000 

JMP 

Jump to address 


Group 1, Operate Instructions 


7000 

NOP 

No operation 

7001 

IAC 

Increment accumulator 

7002 

RAT 

Rotate accumulator two posi 

700)i 

RAL 

Rotate accumulator left 

700o 

RTL 

Rotate two left 

7010 

RAR 

Rotate accumulator right 

7012 

RTR 

Rotate two right 

70p0 

CML 

Complement link 

7040 

CMA 

Complement accumulator 

701|1 

CIA 

Complement and increment ac 

7100 

CLL 

Clear link 

7120 

STL 

Set link 

7200 

CLA 

Clear accumulator 

7204 

GLK 

Transfer link to AC bit 11 

7240 

STA 

Set accumulator to all ONES 

7300 

CRA 

Clear accumulator and link 


Group 2, Operate Instructions 


11x02 

HLT 

7404 

0SR 

7410 

SKP 

7ii20 

SNL 

7430 

SZL 

7440 

SZA 

7450 

SNA 

7500 

SMA 

7510 

SPA 

7604 

las 


Halt 

Or Switch register to accumulator 

Skip, unconditional 

Skip on non-zero link 

Skip on zero link 

Skip on zero accumulator 

Skip on non-zero accumulator 

Skip on minus accumulator 

Skip on positive accumulator 

Load accumulator from switch register 
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Miscellaneous 


0000 


Blank op code and variable fields 

6001 

ION 

Interrupt turn on 

6002 

10? 

Interrupt turn off 

600 ! l 

ADC 

Analog to digital convert 


ISntended Arithmetic Instructions 


7405 

MUY 

Multiply 

7407 

DVI 

Divide 

7411 

NMI 

Normalise 

7413 

SIIL 

Shift arithmetic left 

7415 

ASR 

Arithmetic shift right 

7417 

LSR 

Logical shift right 

7421 

MZL 

Load multiplier quotient 

7441 

SCA 

Step coxmter load into accumulator 

7501 

MQA 

Load accumulator from MQ, 




Teletype Keyboard-Printer 

6O3I 

K3P 

Skip on keyboard flag 

6O32 

KCC 

Clear keyboard flag 

603'!. 

KRS 

Read keyboard buffer static 

6O36 

KRB 

Read keyboard buffer dynamic 

6 041 

TSP 

Skip on teleprinter flag 

6042 

TCP 

Clear teleprinter flag 

6044 

TPC 

Load teleprinter and printer 

6046 

TLS 

Load teleprinter sequence 


Oscilloscope Display Control 


6O51 

DCX 

Clear X coordinate buffer 


6053 

DXL 

Clear and load X coordinate 

buffer 

6054 

DIX 

Intensify 


6061 

DCY 

Clear Y coordinate buffer 


6063 

DYL 

Clear and load Y coordinate 

buffer 

6O6.4 

DIY 

Intensify 


6C71 

DCL 

Clear X, Y, buffer 


6O72 

PLS 

Generate a pulse 


6074 

DRS 

Erase storage scope, CLA 
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Floating 


Point Package 

■ 1 ■ ■ ■ « > ■ . — . . .W.' 


4447 

ENT 

4445 

INP 

444-6 

OUT 

4467 

FIX 

4470 

FLA 

4471 

LIN 

1000 

ADD 

2000 

SUB 

3000 

MUY 

ij_00C 

DIV 

5000 

GST 

6000 

PUT 

7000 

NOR 

0000 

EXT 


0001 

sqa 

00 CP 

CRT 

OOO 3 

SIN 

0004 

COS 

0005 

ATN 

0006 

LOG 

0007 

EXP 

0010 

ABS 

0012 

CR 

0013 

RED 

0014 

PRT 

0015 

NEG 

0016 

ZAC 

0017 

NON 


ORG 

fqu 

DSF 

DSC 

OCT 

ALF 

END 

BSZ 

RIM 

BIN 


Pseudo Operations 

Set location counter (octal) 

Define absolute address 
Op code definition (octal) 

Signed or unsigned decimal constant 
Octal constant 
Two TTY characters 

End of program, check undefined and link list 
Block storage zero of length N (octal) 

Punch rim tape 
Punch bin tape 
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A P P E:N D I 


U 


Character 


8-Bit LRL 

Code PDP Code 


Ar 


Character 


8-Bit 

Code 


LRL 

PDP Code 


.auk 

240 

00 

t 

• 

2i>l 

01 

t? 

242 

02 

# 

243 

03 

$ 

244 

04 

<</ 

/° 

245 

05 

& 

248 

06 

y 

247 

07 

( 

250 

10 

\ 

J 

251 

11 

*4* 

252 

12 

+ 

253 

13 

1 

254 

14 

- 

255 

15 

• 

256 

16 

/ 

257 

17 

0 

260 

20 

1 

261 

21 

2 

262 

22 

3 

263 

23 

4 

264 

24 

r 

265 

25 

/ 

o 

266 

26 

r~f 

i 

267 

27 

8 

270 

30 

9 

271 

31 


A 

301 

41 

B 

302 

42 

C 

3O3 

43 

D 

304 

44 

2 

3 05 

45 

F 

3O6 

46 

r» 

\J 

307 

47 

H 

310 

50 

I 

311 

51 

J 

312 

52 

K 

313 

53 

L 

314 

54 

M 

315 

55 

H 

3'16 

56 

0 

317 

57 

P 

320 

60 

n 

321 

61 

R 

r> p 2 

62 

n 

O 

323 

63 

T 

324 

64 

TJ 

325 

65 

V 

326 

66 

w 

327 

67 

X 

33O 

•70 

Y 

331 

71 

Z 

332 

72 
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a-Bit 

Character Code 


< 

> 

9 

@ 



27 2 

273 

274 

275 

£ ( o 

277 

300 


LRL 


8-Bit 

PDP Code 

Character 

Code 

32 

c 

333 

33 

\ 

334 

34 

□ 

335 

35 

t 

336 

36 


337 

37 

LINS FEED 

212 


RETURN 

215 


LRL 

PDF Code 


73 

74 

75 

76 

77 
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appendix d 


(PDP-8 floating point system summary) 


4447 ENT 

4445 INP 

44 .6 OUT 

4467 FIX 

44.70 FLA 

!;.471 LIN 


Entry Points 

Enter, arithmetic interpreter 
Floating.input 
Floating output 

Convert FAC to integer, leave in AC 
Convert (AC) bo floating, leav e in FAC 
Type carriage return and line feed 


Interpreter Commands (Memory Reference) 


1 

XXX 

ADD 

Floating add 

2 

XXX 

SUB 

Floating subtract 

3 

.XXX 

MPY 

Floating multiply 

4 

XXX 

DIV 

Floating divide 

5 

XXX 

GET 

Load floating accumulator 

6 

XXX 

PUT 

Store floating accumulator 

7 

vvv 

fwA/v 

NOR 

Normalize FAC 


(XXX)+(FAC) 
(FAC)-(XXX) 
(FAC)*(XXX) 
(FAC)/(XXX) 
(XXX) 
(FAC) 


(FAC) 

(FAC) 

(FAC) 

(FAC) 

(FAC) 

(XXX) 


Interpreter Commands (Non-memory Refer 
In all cases, the remit is left in FAC, orgina 


ence) 
1 FAC 


is lost. 


0000 

EXT 

0001 

SQ.R 

0002 

SRT 

000 i 

SIN 

0004 

COS 

0005 

ATN 

0006 

LOG 

0007 

EXP 

0010 

ABS 

0012 

CR 

0011 

RED 

0014 

PRT 

0015 

NSG 

0016 

ZAC 

0017 

NON 


Exit from interpretive inode 
Square FAC 

Take square root of FAC 
Take sine of FAC (radians) 

Take cosine of FAC (radians) 

Take arctangent of FAC (result in radians) 
Take natural log of FAC 
Raise e to the (FAC) power 
Set FAC positive 

Type carriage return and line feed 

Floating input 

Floating output 

Complement FAC 

Zero FAC 

No operation 


20 


















005 ) l 
0055 
oo<6 
0061 
0065 
0066 
0072 
OO 73 


Flags and Control Words 

Floating accumulator exponent 

Floating accumulator high order 

Floating accumulator lovj order 

Contains the last terminator used on input 

Equals aero if no valid input 

Arithmetic error flag 

Output field length Tfl = E format) 

Length of fractional field when F format used 


16 , 1 ? 
1 , 5.75 

36 OO -6577 


Memory Locations used by Flopak 

Index registers 
Flags and pointers 
Floating point package 
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